perm filename KAFFEE.SAI[HAK,HPM]1 blob sn#409031 filedate 1979-01-09 generic text, type C, neo UTF8
COMMENT āŠ—   VALID 00002 PAGES
C REC  PAGE   DESCRIPTION
C00001 00001
C00002 00002	BEGIN "KAFFEE"
C00003 ENDMK
CāŠ—;
BEGIN "KAFFEE"
DEFINE NNAM=13;
PRELOAD_WITH "E","SAIL","E","SOS","MAIL","TELNET","COPY","NS","FINGER",
	"COPY","E","POX","M";
STRING ARRAY JOBNAM[0:NNAM-1];
RAN(CALL(0,"RUNTIM"));
WHILE TRUE DO
   BEGIN
   CALL(CVSIX(JOBNAM[RAN(0)*NNAM]),"SETNAM");
   CALL(60,"SLEEP");
   END;

END "KAFFEE";